1 POKE56334,1
3 POKE53280,0:POKE53281,0:POKE53272,21
4 PRINT"[147]";:
5 PRINT"[146]        [176][192][192][174][176][174][176][174][176][192][192][174] [176][192][192][174][176][192][192][201][176][192][192][201]"
6 PRINT"[146]        [173][174][176][189][221][173][189][221][221] [192][179] [221] [192][179][221][176][201][221][221][176][201][221]"
7 PRINT"         [221][221] [221][176][174][221][221] [192][179] [221] [192][179][221][221][221][221][221][173][203][221]       ";
8 PRINT"         [173][189] [173][189][173][189][173][192][192][189] [173][192][192][189][173][189][173][189][173][192][192][203]       ";
9 FORI=1TO40:PRINT"          ";:NEXT
10 VL=54296:MA=54272:KO=54273:AM=54276:AD=54277:SR=54278
20 FORI=0TO24:POKEMA+I,0:NEXT:POKEVL,15
30 FORI=0TO2:POKEAD+7*I,0:POKESR+7*I,240:NEXT:POKEAM,33:POKEAM+7,33
60 POKEAM+14,81
100 READAA,AB,AC,AE,AF,AG,KE
105 REM POKE53281,AB:POKE53280,AE
110 POKEKO,AA:POKEMA,AB:POKEKO+7,AC:POKEMA+7,AE:POKEKO+14,AF:POKEMA+14,AG
120 IFKE<0THENRESTORE
130 TI$="000000"
140 IFTI<KETHEN140
150 GOTO 100
200 DATA 21,154,8,147,4,73,60
202 DATA 22,227,8,147,4,73,15
204 DATA 21,154,8,147,4,73,15
206 DATA 19,63,8,147,4,73,15
208 DATA 21,154,8,147,4,73,15
210 DATA 14,107,9,159,5,185,60
211 DATA 21,154,9,159,5,185,4
212 DATA 22,227,9,159,5,185,15
214 DATA 21,154,9,159,5,185,15
216 DATA 19,63,9,159,5,185,15
218 DATA 21,154,9,159,5,185,15
220 DATA 14,107,11,114,5,185,60
222 DATA 22,227,11,114,5,185,9
224 DATA 0,0,11,114,5,185,1
226 DATA 22,227,11,114,5,185,9
228 DATA 0,0,11,114,5,185,1
230 DATA 22,227,11,114,5,185,9
232 DATA 0,0,11,114,5,185,1
234 DATA 25,177,11,114,5,185,10
236 DATA 0,0,11,114,5,185,1
238 DATA 22,227,11,114,5,185,10
240 DATA 0,0,11,114,5,185,1
242 DATA 28,214,7,53,4,73,65
244 DATA 25,177,6,108,4,12,33
246 DATA 0,0,6,108,4,12,33
260 DATA 21,154,8,147,4,73,60
262 DATA 22,227,8,147,4,73,15
264 DATA 21,154,8,147,4,73,15
266 DATA 19,63,8,147,4,73,15
268 DATA 21,154,8,147,4,73,15
270 DATA 14,107,9,159,5,185,60
271 DATA 21,154,9,159,5,185,4
272 DATA 22,227,9,159,5,185,15
274 DATA 21,154,9,159,5,185,15
276 DATA 19,63,9,159,5,185,15
278 DATA 21,154,9,159,5,185,15
280 DATA 14,107,11,114,5,185,60
282 DATA 22,227,11,114,5,185,10
284 DATA 0,0,11,114,5,185,1
286 DATA 22,227,11,114,5,185,10
288 DATA 0,0,11,114,5,185,1
290 DATA 22,227,11,114,5,185,10
292 DATA 0,0,11,114,5,185,1
294 DATA 25,177,11,114,5,185,10
296 DATA 0,0,11,114,5,185,1
298 DATA 22,227,11,114,5,185,10
300 DATA 0,0,11,114,5,185,1
302 DATA 21,154,6,108,4,73,15
304 DATA 19,63,6,108,4,12,15
306 DATA 0,0,6,108,4,12,90
308 DATA 22,227,6,108,8,23,15
310 DATA 21,154,5,103,8,23,15
312 DATA 0,0,5,103,8,23,0
314 DATA 21,154,5,103,8,23,15
316 DATA 0,0,5,103,8,23,30
318 DATA 0,0,6,206,9,159,30
320 DATA 27,56,6,206,9,159,6
322 DATA 28,214,6,206,9,159,6
324 DATA 32,94,6,206,9,159,6
326 DATA 0,0,6,206,9,159,6
328 DATA 32,94,7,53,5,103,15
330 DATA 28,214,7,53,5,103,15
332 DATA 0,0,7,53,5,103,30
334 DATA 0,0,6,108,9,159,45
336 DATA 28,214,6,108,9,159,15
338 DATA 32,94,11,114,8,147,15
340 DATA 28,214,11,114,8,147,15
342 DATA 0,0,11,114,8,147,45
344 DATA 32,94,11,114,8,147,30
346 DATA 28,214,11,114,8,147,15
348 DATA 25,177,12,216,9,159,125
350 DATA 22,227,6,108,8,23,15
352 DATA 21,154,5,103,8,23,15
354 DATA 0,0,5,103,8,23,0
356 DATA 21,154,5,103,8,23,15
358 DATA 0,0,5,103,8,23,30
360 DATA 0,0,6,206,9,159,30
362 DATA 27,56,6,206,9,159,6
364 DATA 28,214,6,206,9,159,6
366 DATA 32,94,6,206,9,159,6
368 DATA 0,0,6,206,9,159,6
370 DATA 32,94,7,53,5,103,15
372 DATA 28,214,7,53,5,103,15
374 DATA 0,0,7,53,5,103,30
376 DATA 0,0,6,108,4,208,47
378 DATA 28,214,6,108,4,208,15
380 DATA 32,94,11,114,8,147,15
382 DATA 28,214,11,114,8,147,15
384 DATA 0,0,11,114,8,147,45
386 DATA 32,94,11,114,8,147,45
388 DATA 28,214,11,114,8,147,15
390 DATA 25,177,12,216,9,159,125
392 DATA 0,0,0,0,0,0,0
394 DATA 19,63,6,108,6,108,15
396 DATA 21,154,0,0,0,0,15
398 DATA 22,227,6,108,6,108,15
400 DATA 25,177,0,0,0,0,15
402 DATA 14,107,6,108,6,108,15
404 DATA 16,47,0,0,0,0,15
406 DATA 17,37,6,108,6,108,15
408 DATA 19,63,0,0,0,0,15
410 DATA 17,37,11,114,5,185,15
412 DATA 17,37,14,107,5,185,15
414 DATA 17,47,8,147,5,185,15
418 DATA 17,37,14,107,5,185,15
420 DATA 0,0,11,114,5,185,15
422 DATA 17,37,14,107,5,185,3
424 DATA 0,0,14,107,5,185,8
426 DATA 17,37,8,147,5,185,3
428 DATA 0,0,8,147,5,185,8
430 DATA 17,37,14,107,5,185,3
432 DATA 0,0,14,107,5,185,8
434 DATA 21,154,14,107,7,53,3
436 DATA 0,0,14,107,7,53,8
438 DATA 21,154,17,37,7,53,3
440 DATA 0,0,17,37,7,53,8
442 DATA 19,63,10,205,7,53,3
444 DATA 0,0,10,205,7,53,8
446 DATA 17,37,17,37,7,53,3
448 DATA 0,0,17,37,7,53,8
450 DATA 0,0,14,107,7,53,15
452 DATA 21,154,17,37,7,53,3
454 DATA 0,0,17,37,7,53,8
456 DATA 19,63,10,205,7,53,3
458 DATA 0,0,10,205,7,53,8
460 DATA 17,37,17,37,7,53,3
462 DATA 0,0,17,37,7,53,8
464 DATA 19,63,9,159,9,159,15
466 DATA 0,0,12,32,9,159,15
468 DATA 19,63,7,53,9,159,5
470 DATA 0,0,12,32,9,159,5
472 DATA 21,154,9,159,9,159,15
474 DATA 0,0,12,32,9,159,15
476 DATA 19,63,7,53,9,159,15
478 DATA 19,63,12,32,9,159,3
480 DATA 0,0,12,32,9,159,8
482 DATA 38,126,9,159,9,159,15
484 DATA 43,52,12,32,9,159,15
486 DATA 48,127,7,53,9,159,15
488 DATA 51,97,12,32,9,159,15
490 DATA 57,172,9,159,9,159,15
492 DATA 64,188,12,32,9,159,15
494 DATA 68,149,7,53,9,159,15
496 DATA 76,252,12,32,9,159,15
498 DATA 17,37,11,114,5,185,15
500 DATA 17,37,14,107,5,185,15
502 DATA 0,0,8,147,5,185,15
504 DATA 17,37,14,107,5,185,3
506 DATA 0,0,14,107,5,185,8
508 DATA 17,37,11,114,5,185,3
510 DATA 0,0,0,0,5,185,8
512 DATA 17,37,14,107,5,185,3
514 DATA 0,0,14,107,5,185,8
516 DATA 17,37,8,147,5,185,3
518 DATA 0,0,8,147,5,185,8
520 DATA 17,37,14,107,5,185,3
522 DATA 0,0,14,107,5,185,8
524 DATA 21,154,9,159,9,159,3
526 DATA 0,0,9,159,9,159,8
528 DATA 21,154,11,114,9,159,3
530 DATA 0,0,11,114,9,159,8
532 DATA 19,63,7,53,9,159,3
534 DATA 0,0,7,53,9,159,8
536 DATA 17,37,11,114,9,159,3
538 DATA 0,0,11,114,9,159,8
540 DATA 17,37,9,159,9,159,3
542 DATA 0,0,9,159,9,159,8
544 DATA 17,37,11,114,9,159,3
546 DATA 0,0,11,114,9,159,8
548 DATA 17,37,7,53,9,159,3
550 DATA 0,0,7,53,9,159,8
552 DATA 19,63,11,114,9,159,3
554 DATA 0,0,11,114,9,159,8
556 DATA 21,154,10,205,5,103,15
558 DATA 25,177,12,216,5,103,15
560 DATA 25,177,8,23,5,103,15
562 DATA 25,177,12,216,5,103,15
564 DATA 28,214,10,205,5,103,15
566 DATA 28,214,12,216,5,103,15
568 DATA 25,177,8,23,5,103,15
570 DATA 25,177,12,216,5,103,15
572 DATA 0,0,12,216,6,108,15
574 DATA 0,0,16,47,6,108,15
576 DATA 0,0,9,159,6,108,15
578 DATA 0,0,16,47,6,108,15
580 DATA 0,0,12,216,6,108,15
582 DATA 0,0,16,47,6,108,15
584 DATA 0,0,9,159,6,108,15
586 DATA 0,0,16,47,6,108,15
588 DATA 0,0,0,0,0,0,-1